tridag Subroutine

public subroutine tridag(a, b, c, r, u, n)

создает трехдиагональнйю матрицу

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=wp),	intent(in)			::	a(n)
real(kind=wp),	intent(in)			::	b(n)
real(kind=wp),	intent(in)			::	c(n)
real(kind=wp),	intent(in)			::	r(n)
real(kind=wp),	intent(inout)			::	u(n)
integer,	intent(in)			::	n